/**
**********************************************************************
* @file     main.c
* @brief    对文件的简要说明
* @details  对文件的详细说明
* @author   jcai
* @date     2022-05-06 10:26:22
* @copyright Copyright &copy; 2022 wy1107412334@163.com All rights reserved
* @version  v0.0.1
*
* \n Email:  wy1107412334@163.com
* \n Blog:   None
* \n Github: https://github.com/wy1107412334
* \n Gitee:  https://gitee.com/git.git1107412334.com
*
**********************************************************************
* @note
* None.
**********************************************************************
* @attention
* None.
**********************************************************************
@verbatim
@endverbatim
**********************************************************************
* @par 历史记录
* 1. v0.0.1: jcai, 2022-05-06 10:26:22
*   - 首次编写
*
*<center>Copyright &copy; 2022 wy1107412334@163.com All rights reserved</center>
**********************************************************************
*/

/* 头文件导入区 --------------------------------------------------- */

#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <SDL/SDL.h>
#include <SDL/SDL_video.h>
#include <SDL/SDL_image.h>
#include <SDL/SDL_events.h>
#include <SDL/SDL_timer.h>


typedef struct
{
    int startTicks;
    int pausedTicks;
    int paused;
    int started;
} Timer_t;

// 窗口属性
const int SCREEN_WIDTH = 640;
const int SCREEN_HEIGHT = 480;
const int SCREEN_BPP = 32;

// 帧速率
const int FRAMES_PER_SECOND = 20;

// 翻转标志
const int FLIP_VERTICAL = 1;
const int FLIP_HORIZONTAL = 2;

// 将要使用的表面
SDL_Surface *topLeft = NULL;
SDL_Surface *topRight = NULL;
SDL_Surface *bottomLeft = NULL;
SDL_Surface *bottomRight = NULL;
SDL_Surface *screen = NULL;

// 事件结构体
SDL_Event event;



SDL_Surface *load_image(const char *file)
{
    SDL_Surface *loadedImage = NULL;
    SDL_Surface *optimizedImage = NULL;

    // 通过 SDL_imag 模块加载图片
    loadedImage = IMG_Load(file);
    if (!loadedImage)   return NULL;

    optimizedImage = SDL_DisplayFormat(loadedImage);
    SDL_FreeSurface(loadedImage);
    if (optimizedImage)
    {
        // 映射关键色
        uint32_t keycolor = SDL_MapRGB(optimizedImage->format, 0, 0xff, 0xff);
        // 将所有颜色为 RGB(0x00, 0xff, 0xff) 的像素设为透明
        SDL_SetColorKey(optimizedImage, SDL_SRCCOLORKEY, keycolor);
    }

    return optimizedImage;
}

void apply_surface(int x, int y, SDL_Surface *src, SDL_Surface *dst,
                   const SDL_Rect *clip)
{
    SDL_Rect offset;

    offset.x = x;
    offset.y = y;

    SDL_BlitSurface(src, (SDL_Rect *)clip, dst, &offset);
}

int init()
{
    if (SDL_Init(SDL_INIT_EVERYTHING) == -1)
        return -1;

    screen = SDL_SetVideoMode(SCREEN_WIDTH, SCREEN_HEIGHT, SCREEN_BPP,
                              SDL_SWSURFACE);
    if (!screen)
    {
        SDL_Quit();
        return -2;
    }

    SDL_WM_SetCaption("Filp Test", NULL);

    return 0;
}

int load_files()
{
    // 加载图片
    topLeft = load_image( "corner.png" );
    if (!topLeft)
    {
        return -1;
    }

    return 0;
}

void clean_up()
{
    SDL_FreeSurface(topLeft);
    SDL_FreeSurface( topRight );
    SDL_FreeSurface( bottomLeft );
    SDL_FreeSurface( bottomRight );

    SDL_Quit();
}


uint32_t get_pixel32( SDL_Surface *surface, int x, int y )
{
    //Convert the pixels to 32 bit
    uint32_t *pixels = (uint32_t *)surface->pixels;

    //Get the requested pixel
    return pixels[ ( y * surface->w ) + x ];
}

void put_pixel32( SDL_Surface *surface, int x, int y, uint32_t pixel )
{
    //Convert the pixels to 32 bit
    uint32_t *pixels = (uint32_t *)surface->pixels;

    //Set the pixel
    pixels[ ( y * surface->w ) + x ] = pixel;
}

SDL_Surface *flip_surface( SDL_Surface *surface, int flags )
{
    //Pointer to the soon to be flipped surface
    SDL_Surface *flipped = NULL;
    int x, y;
    int rx, ry;

    //If the image is color keyed
    if( surface->flags & SDL_SRCCOLORKEY )
    {
        flipped = SDL_CreateRGBSurface(SDL_SWSURFACE, surface->w, surface->h,
                                       surface->format->BitsPerPixel,
                                       surface->format->Rmask,
                                       surface->format->Gmask,
                                       surface->format->Bmask, 0);
    }
    //Otherwise
    else
    {
        flipped = SDL_CreateRGBSurface(SDL_SWSURFACE, surface->w, surface->h,
                                       surface->format->BitsPerPixel,
                                       surface->format->Rmask,
                                       surface->format->Gmask,
                                       surface->format->Bmask,
                                       surface->format->Amask);
    }

    //If the surface must be locked
    if( SDL_MUSTLOCK( surface ) )
    {
        //Lock the surface
        SDL_LockSurface( surface );
    }

    //Go through columns
    for(x = 0, rx = flipped->w - 1; x < flipped->w; x++, rx-- )
    {
        //Go through rows
        for(y = 0, ry = flipped->h - 1; y < flipped->h; y++, ry-- )
        {
            //Get pixel
            uint32_t pixel = get_pixel32( surface, x, y );

            //Copy pixel
            if( ( flags & FLIP_VERTICAL ) && ( flags & FLIP_HORIZONTAL ) )
            {
                put_pixel32( flipped, rx, ry, pixel );
            }
            else if( flags & FLIP_HORIZONTAL )
            {
                put_pixel32( flipped, rx, y, pixel );
            }
            else if( flags & FLIP_VERTICAL )
            {
                put_pixel32( flipped, x, ry, pixel );
            }
        }
    }

    //Unlock surface
    if( SDL_MUSTLOCK( surface ) )
    {
        SDL_UnlockSurface( surface );
    }

    //Copy color key
    if( surface->flags & SDL_SRCCOLORKEY )
    {
        SDL_SetColorKey( flipped, SDL_RLEACCEL | SDL_SRCCOLORKEY, surface->format->colorkey );
    }

    //Return flipped surface
    return flipped;
}


void timer_init(Timer_t *tm)
{
    tm->startTicks = 0;
    tm->pausedTicks = 0;
    tm->paused = 0;
    tm->started = 0;
}
void timer_start(Timer_t *tm)
{
    tm->started = 1;
    tm->paused = 0;

    tm->startTicks = SDL_GetTicks();
}
void timer_stop(Timer_t *tm)
{
    tm->started = 0;
}
void timer_pause(Timer_t *tm)
{
    if (tm->started && !tm->paused)
    {
        tm->paused = 1;
        tm->pausedTicks = SDL_GetTicks() - tm->startTicks;
    }
}
void timer_unpause(Timer_t *tm)
{
    if (tm->paused)
    {
        tm->paused = 0;

        tm->startTicks = SDL_GetTicks() - tm->pausedTicks;
        tm->pausedTicks = 0;
    }
}
int timer_get_ticks(Timer_t *tm)
{
    if (tm->started)
    {
        if (tm->paused)
            return tm->pausedTicks;
        else
            return SDL_GetTicks() - tm->startTicks;
    }
    return 0;
}
int timer_is_started(Timer_t *tm)
{
    return tm->started;
}
int timer_is_paused(Timer_t *tm)
{
    return tm->paused;
}


/**
**********************************************************************
* @brief    简要说明
* @details  详细说明
* @param    none
* @param[in]     a: 该参数用于输入
* @param[in,out] b: 该参数用于输入和输出
* @param[out]    c: 该参数用于输出
* @retval  none
* @retval  0 函数成功
* @retval  1 函数失败
* @return  返回0成功；否则失败
* @note    none
*/
int main(int argc, char *argv[])
{
    Timer_t fps;
    int quit = 0;

    if (init() != 0)
    {
        fprintf(stderr, "SDL初始化失败\n");
        return EXIT_FAILURE;
    }

    if (load_files() != 0)
    {
        fprintf(stderr, "SDL加载 background.png 失败\n");
        return EXIT_FAILURE;
    }

    // 翻转表面
    topRight = flip_surface(topLeft, FLIP_HORIZONTAL);
    bottomLeft = flip_surface(topLeft, FLIP_VERTICAL);
    bottomRight = flip_surface(topLeft, FLIP_HORIZONTAL | FLIP_VERTICAL);

    // 将图片贴到屏幕
    apply_surface(0, 0, topLeft, screen, NULL);
    apply_surface(320, 0, topRight, screen, NULL);
    apply_surface(0, 240, bottomLeft, screen, NULL);
    apply_surface(320, 240, bottomRight, screen, NULL);

    timer_init(&fps);

    while (!quit)
    {
        timer_start(&fps);

        // 处理SDL的事件
        while (SDL_PollEvent(&event))
        {
            // 如果用户点击了窗口右上角的关闭按钮
            if (event.type == SDL_QUIT)
            {
                quit = 1;
                printf("处理退出事件\n");
            }
        }


        // 更新窗口
        if (SDL_Flip(screen) == -1)
        {
            fprintf(stderr, "SDL更新窗口失败\n");
            break;
        }

        // 控制帧速率
        if (timer_get_ticks(&fps) < (1000 / FRAMES_PER_SECOND))
            SDL_Delay((1000 / FRAMES_PER_SECOND) - timer_get_ticks(&fps));
    }

    clean_up();

    return 0;
}


/***  Copyright (C) 2022 wy1107412334@163.com All rights reserved ***/
/****************************** END OF FILE *************************/

